home *** CD-ROM | disk | FTP | other *** search
/ J-Mac Electronics & Home Comics / J-Mac Electronics & Home Comics.iso / mac / J-MAC / G28F / G28_KUJI.Dxr / 00045.ls < prev    next >
Encoding:
Text File  |  1998-01-22  |  2.2 KB  |  111 lines
  1. on startMovie
  2.   set mycursor to [1, 2]
  3.   set the cursor of sprite 11 to mycursor
  4.   set the cursor of sprite 12 to mycursor
  5.   set the cursor of sprite 13 to mycursor
  6.   set the cursor of sprite 14 to mycursor
  7.   set the cursor of sprite 15 to mycursor
  8.   set the cursor of sprite 16 to mycursor
  9.   set the cursor of sprite 17 to mycursor
  10.   set the cursor of sprite 18 to mycursor
  11.   set volset to the soundLevel
  12.   if the soundEnabled = 0 then
  13.     set the soundEnabled to 1
  14.   end if
  15. end
  16.  
  17. on doexit
  18.   sound stop 1
  19.   go("M1", "@::JMACMENU")
  20. end
  21.  
  22. on crtopen
  23.   puppetSprite(6, 1)
  24.   repeat while the stillDown
  25.     set the memberNum of sprite 6 to 10
  26.     updateStage()
  27.   end repeat
  28.   set the memberNum of sprite 6 to 8
  29.   updateStage()
  30.   puppetSprite(6, 0)
  31. end
  32.  
  33. on crtclose
  34.   puppetSprite(7, 1)
  35.   repeat while the stillDown
  36.     set the memberNum of sprite 7 to 11
  37.     updateStage()
  38.   end repeat
  39.   set the memberNum of sprite 7 to 9
  40.   updateStage()
  41.   puppetSprite(7, 0)
  42. end
  43.  
  44. on crtclose2
  45.   puppetSprite(22, 1)
  46.   repeat while the stillDown
  47.     set the memberNum of sprite 22 to 20
  48.     updateStage()
  49.   end repeat
  50.   set the memberNum of sprite 22 to 19
  51.   updateStage()
  52.   puppetSprite(22, 0)
  53.   puppetSprite(1, 0)
  54. end
  55.  
  56. on crtzoomin
  57.   puppetSprite(23, 1)
  58.   repeat while the stillDown
  59.     set the memberNum of sprite 23 to 22
  60.     updateStage()
  61.   end repeat
  62.   set the memberNum of sprite 23 to 21
  63.   updateStage()
  64.   puppetSprite(23, 0)
  65. end
  66.  
  67. on crtzoomout
  68.   puppetSprite(23, 1)
  69.   repeat while the stillDown
  70.     set the memberNum of sprite 23 to 34
  71.     updateStage()
  72.   end repeat
  73.   set the memberNum of sprite 23 to 33
  74.   updateStage()
  75.   puppetSprite(23, 0)
  76.   puppetSprite(1, 0)
  77. end
  78.  
  79. on crtg1
  80.   puppetSprite(25, 1)
  81.   repeat while the stillDown
  82.     set the memberNum of sprite 25 to 26
  83.     updateStage()
  84.   end repeat
  85.   set the memberNum of sprite 25 to 25
  86.   updateStage()
  87.   puppetSprite(25, 0)
  88. end
  89.  
  90. on crtg2
  91.   puppetSprite(26, 1)
  92.   repeat while the stillDown
  93.     set the memberNum of sprite 26 to 28
  94.     updateStage()
  95.   end repeat
  96.   set the memberNum of sprite 26 to 27
  97.   updateStage()
  98.   puppetSprite(26, 0)
  99. end
  100.  
  101. on crtg3
  102.   puppetSprite(24, 1)
  103.   repeat while the stillDown
  104.     set the memberNum of sprite 24 to 24
  105.     updateStage()
  106.   end repeat
  107.   set the memberNum of sprite 24 to 23
  108.   updateStage()
  109.   puppetSprite(24, 0)
  110. end
  111.